home *** CD-ROM | disk | FTP | other *** search
/ Super League / Super League.iso / TUTORIAL / CURSO / WHERE.DXR / 00021.ls < prev    next >
Encoding:
Text File  |  1997-03-25  |  1.1 KB  |  49 lines

  1. on enterFrame
  2.   global var1, var2
  3.   if chars(var2, 6, 6) = "1" then
  4.     set the visible of sprite 30 to 1
  5.   end if
  6.   if chars(var2, 6, 6) = "2" then
  7.     set the visible of sprite 31 to 1
  8.   end if
  9.   if chars(var2, 6, 6) = "3" then
  10.     set the visible of sprite 32 to 1
  11.   end if
  12.   if chars(var2, 6, 6) = "4" then
  13.     set the visible of sprite 33 to 1
  14.   end if
  15.   if chars(var2, 6, 6) = "5" then
  16.     set the visible of sprite 34 to 1
  17.   end if
  18.   if chars(var2, 6, 6) = "6" then
  19.     if var1 < 4 then
  20.       set the visible of sprite 35 to 1
  21.     end if
  22.     if var1 > 3 then
  23.       set the visible of sprite 36 to 1
  24.     end if
  25.   end if
  26.   if chars(var2, 6, 6) = "7" then
  27.     set the visible of sprite 37 to 1
  28.   end if
  29.   if chars(var2, 6, 6) = "8" then
  30.     if var1 < 75 then
  31.       set the visible of sprite 38 to 1
  32.     end if
  33.     if (var1 < 80) and (var1 > 74) then
  34.       set the visible of sprite 39 to 1
  35.     end if
  36.     if (var1 < 85) and (var1 > 79) then
  37.       set the visible of sprite 40 to 1
  38.     end if
  39.     if var1 > 84 then
  40.       set the visible of sprite 41 to 1
  41.     end if
  42.   end if
  43. end
  44.  
  45. on exitFrame
  46.   general()
  47.   go(#loop)
  48. end
  49.